#pragma once
#include <iostream>
#include <string>
#include <cerrno>
#include <cstring>
#include <cstdlib>
#include <signal.h>
#include <sys/wait.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <pthread.h>
#include "./threadpool/ThreadPool.hpp"
#include "./threadpool/Task.hpp"

// static void service(int sock,const std::string &ip,const uint16_t &port)
// {
//     char buffer[1024];
//     memset(buffer,0,sizeof(buffer));

//     while(true)
//     {
//         // 读取数据
//         ssize_t n=read(sock,buffer,sizeof(buffer)-1);
//         if(n>0)
//         {
//             buffer[n]='\0';
//             std::cout<<ip<<":"<<port<<"# "<<buffer<<std::endl;
//         }
//         else if(n==0)
//         {
//             std::cout<<"reader shutdown "<<ip<<":"<<port<<std::endl;
//             break;
//         }
//         else
//         {
//             fprintf(stdout,"read error %d:%s\n",errno,strerror(errno));
//             break;
//         }
//         // 写会数据
//         write(sock,buffer,strlen(buffer));
//     }

//     close(sock);
// }

static void service(int sock, const std::string &ip, const uint16_t &port)
{
    char buffer[1024];
    memset(buffer, 0, sizeof(buffer));

    std::string message;

    // 读取数据
    ssize_t n = read(sock, buffer, sizeof(buffer) - 1);
    if (n > 0)
    {
        buffer[n] = '\0';
        std::cout << ip << ":" << port << "# " << buffer << std::endl;

        for(int i=0;i<n;++i)
        {
            if(islower(buffer[i]))
            {
                message.push_back(toupper(buffer[i]));
            }
            else
            {
                message.push_back(buffer[i]);
            }
        }

    }
    else if (n == 0)
    {
        std::cout << "reader shutdown " << ip << ":" << port << std::endl;
    }
    else
    {
        fprintf(stdout, "read error %d:%s\n", errno, strerror(errno));
    }
    // 写会数据
    // write(sock, buffer, strlen(buffer));
    write(sock, message.c_str(), message.size());

    close(sock);
}

class ServerTCP
{
private:
    const static int backlog = 20;

    // class ThreadData
    // {
    // public:
    //     uint16_t _port;
    //     int _sock;
    //     std::string _ip;
    // };

    // static void *threadStack(void *args)
    // {
    //     pthread_detach(pthread_self());
    //     ThreadData *ptd = static_cast<ThreadData *>(args);
    //     service(ptd->_sock, ptd->_ip, ptd->_port);

    //     delete ptd;
    //     return nullptr;
    // }

private:
    int _listenSock;
    uint16_t _port;
    std::string _ip;

public:
    ServerTCP(uint16_t port, const std::string &ip = "")
        : _listenSock(0), _port(port), _ip(ip)
    {
        ThreadPool<Task>::GetInstance()->Run();
    }

    void init()
    {
        // 1.创建套接字
        _listenSock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listenSock < 0)
        {
            fprintf(stdout, "socket error %d:%s\n", errno, strerror(errno));
            exit(2);
        }
        std::cout << "socket success" << std::endl;

        // 2.进行bind
        struct sockaddr_in local;
        memset((void *)&local, 0, sizeof(local));

        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = _ip.empty() ? INADDR_ANY : inet_addr(_ip.c_str());

        if (bind(_listenSock, (struct sockaddr *)&local, sizeof(local)) < 0)
        {
            fprintf(stdout, "bind error %d:%s\n", errno, strerror(errno));
            // close(_listenSock);
            exit(3);
        }
        std::cout << "bind success" << std::endl;

        // 3.将_serviceSock设置为监听状态
        if (listen(_listenSock, backlog) < 0)
        {
            fprintf(stdout, "listen error %d:%s\n", errno, strerror(errno));
            // close(_listenSock);
            exit(4);
        }
        std::cout << "listen success" << std::endl;
    }

    void start()
    {
        // signal(SIGCHLD,SIG_IGN); // 手动设置为忽略,让子进程自己回收自己

        while (true)
        {
            // 获取连接
            struct sockaddr_in src;
            socklen_t srclen = sizeof(src);

            int serviceSock = accept(_listenSock, (struct sockaddr *)&(src), &srclen);
            if (serviceSock < 0)
            {
                fprintf(stdout, "accept error %d:%s\n", errno, strerror(errno));
                continue;
            }

            // 分析src
            std::string srcip = inet_ntoa(src.sin_addr);
            uint16_t srcport = ntohs(src.sin_port);

            // version4:线程池中的线程来完成service

            Task t(service,serviceSock,srcip,srcport);

            ThreadPool<Task>::GetInstance()->PushTask(t);

            // version3:创建线程来完成service
            // pthread_t tid;

            // ThreadData *ptd = new ThreadData();
            // ptd->_port = srcport;
            // ptd->_sock = serviceSock;
            // ptd->_ip = srcip;

            // pthread_create(&tid, nullptr, threadStack, ptd);

            // version2:创建子进程及孙子进程,让孙子进程进行service而且让1号进程领养
            // pid_t id=fork();
            // if(id==0)
            // {
            //     close(_listenSock);
            //     if(fork()>0)
            //     {
            //         exit(0);
            //     }
            //     service(serviceSock,srcip,srcport);
            //     exit(0);
            // }
            // close(serviceSock);
            // waitpid(id,nullptr,0);

            // version1:创建子进程
            // pid_t id=fork();
            // if(id==0)
            // {
            //     close(_listenSock);
            //     service(serviceSock,srcip,srcport);
            //     exit(0);
            // }
            // close(serviceSock);
            // //waitpid(id,nullptr,WNOHANG);
        }
    }

    ~ServerTCP()
    {
    }
};